with Legend.Application;
procedure Program is

   --   -liconv -luser32 -lgdi32 -lwinmm

begin
   Legend.Application.Run;
end Program;
